PC WORLD Online - Word ▌τin Faydal² Makrolar

Dosya Kopyalama

O anda ⁿzerinde τal²■t²≡²n²z Word belgesini kaydettikten sonra ba■ka bir yere bir de yede≡ini almak ister misiniz. A■a≡²da listesini verdi≡imiz dosyakopyala makrosunu word makro ar■ivinize eklerseniz, bu zahmetsizce ba■arabilirsiniz.

makro 4: dosyakopyala

Sub MAIN
a$ = FileName$()
Dim dlg As CopyFile
dlg.FileName = a$
dlg.Directory = "C:\"
x = Dialog(dlg)
If x = - 1 Then CopyFile dlg
End Sub